home *** CD-ROM | disk | FTP | other *** search
- on enterFrame
- global girly
- namechange()
- preLoadCast(264)
- preLoadCast(254)
- preLoadCast(258)
- preLoadCast(119)
- preLoadCast(113)
- preLoadCast(117)
- set girly to 0
- puppetSprite(1, 0)
- puppetSprite(2, 0)
- puppetSprite(3, 0)
- puppetSprite(4, 0)
- puppetSprite(5, 0)
- repeat with x = 1 to 6
- if rollOver(x) then
- set the cursor of sprite x to -1
- end if
- end repeat
- end
-
- on exitFrame
- global gbRollW1, gbRollW2, gbRollW3, gbRollW4
- updateStage()
- repeat with x = 20 to 27
- if rollOver(x) then
- set the cursor of sprite x to [561, 562]
- end if
- end repeat
- if rollOver(14) and (gbRollW1 <> 1) then
- set the visible of sprite 25 to 1
- set gbRollW1 to 1
- else
- if not rollOver(14) and (gbRollW1 <> 0) then
- set the visible of sprite 25 to 0
- set gbRollW1 to 0
- end if
- end if
- if rollOver(16) and (gbRollW2 <> 1) then
- set the visible of sprite 26 to 1
- set gbRollW2 to 1
- else
- if not rollOver(16) and (gbRollW2 <> 0) then
- set the visible of sprite 26 to 0
- set gbRollW2 to 0
- end if
- end if
- if rollOver(17) and (gbRollW3 <> 1) then
- set the visible of sprite 27 to 1
- set gbRollW3 to 1
- else
- if not rollOver(17) and (gbRollW3 <> 0) then
- set the visible of sprite 27 to 0
- set gbRollW3 to 0
- end if
- end if
- if rollOver(15) and (gbRollW4 <> 1) then
- repeat with i = 20 to 22
- set the visible of sprite i to 1
- end repeat
- set gbRollW4 to 1
- else
- if not rollOver(15) and (gbRollW4 <> 0) then
- repeat with i = 20 to 22
- set the visible of sprite i to 0
- end repeat
- set gbRollW4 to 0
- end if
- end if
- go(the frame)
- end
-